/*
 * This program is free software: you can redistribute it and/or modify it under
 * the terms of the GNU General Public License as published by the Free Software
 * Foundation, either version 3 of the License, or (at your option) any later
 * version.
 *
 * This program is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
 * details.
 *
 * You should have received a copy of the GNU General Public License along with
 * this program. If not, see <http://www.gnu.org/licenses/>.
 */
package net.sf.l2j.gameserver.model.actor.instance;

import java.util.List;

import javolution.util.FastList;
import net.sf.l2j.gameserver.MonsterRace;
import net.sf.l2j.gameserver.ThreadPoolManager;
import net.sf.l2j.gameserver.idfactory.IdFactory;
import net.sf.l2j.gameserver.model.L2ItemInstance;
import net.sf.l2j.gameserver.model.actor.knownlist.RaceManagerKnownList;
import net.sf.l2j.gameserver.network.SystemMessageId;
import net.sf.l2j.gameserver.network.serverpackets.ActionFailed;
import net.sf.l2j.gameserver.network.serverpackets.DeleteObject;
import net.sf.l2j.gameserver.network.serverpackets.InventoryUpdate;
import net.sf.l2j.gameserver.network.serverpackets.L2GameServerPacket;
import net.sf.l2j.gameserver.network.serverpackets.MonRaceInfo;
import net.sf.l2j.gameserver.network.serverpackets.NpcHtmlMessage;
import net.sf.l2j.gameserver.network.serverpackets.PlaySound;
import net.sf.l2j.gameserver.network.serverpackets.SystemMessage;
import net.sf.l2j.gameserver.templates.L2NpcTemplate;
import net.sf.l2j.gameserver.util.Broadcast;

public class L2RaceManagerInstance extends L2NpcInstance {
	public static final int LANES = 8;
	public static final int WINDOW_START = 0;
	@SuppressWarnings("unused")
	private static List<Race> _history;
	private static List<L2RaceManagerInstance> _managers;
	protected static int _raceNumber = 4;
	// Time Constants
	private final static long SECOND = 1000;
	private final static long MINUTE = 60 * SECOND;
	private static int _minutes = 5;
	// States
	private static final int ACCEPTING_BETS = 0;
	private static final int WAITING = 1;
	private static final int STARTING_RACE = 2;
	private static final int RACE_END = 3;
	private static int _state = RACE_END;
	protected static final int[][] _codes = { { -1, 0 }, { 0, 15322 },
			{ 13765, -1 } };
	private static boolean _notInitialized = true;
	protected static MonRaceInfo _packet;
	protected static final int _cost[] = { 100, 500, 1000, 5000, 10000, 20000,
			50000, 100000 };

	public L2RaceManagerInstance(int objectId, L2NpcTemplate template) {
		super(objectId, template);
		getKnownList(); // init knownlist
		if (_notInitialized) {
			_notInitialized = false;
			// *
			_history = new FastList<Race>();
			_managers = new FastList<L2RaceManagerInstance>();
			ThreadPoolManager s = ThreadPoolManager.getInstance();
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_TICKETS_AVAILABLE_FOR_S1_RACE), 0,
					10 * MINUTE);
			s.scheduleGeneralAtFixedRate(
					new Announcement(
							SystemMessageId.MONSRACE_TICKETS_NOW_AVAILABLE_FOR_S1_RACE),
					30 * SECOND, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_TICKETS_AVAILABLE_FOR_S1_RACE),
					MINUTE, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(
					new Announcement(
							SystemMessageId.MONSRACE_TICKETS_NOW_AVAILABLE_FOR_S1_RACE),
					MINUTE + 30 * SECOND, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_TICKETS_STOP_IN_S1_MINUTES),
					2 * MINUTE, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_TICKETS_STOP_IN_S1_MINUTES),
					3 * MINUTE, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_TICKETS_STOP_IN_S1_MINUTES),
					4 * MINUTE, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_TICKETS_STOP_IN_S1_MINUTES),
					5 * MINUTE, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_TICKETS_STOP_IN_S1_MINUTES),
					6 * MINUTE, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_TICKET_SALES_CLOSED), 7 * MINUTE,
					10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_BEGINS_IN_S1_MINUTES), 7 * MINUTE,
					10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_BEGINS_IN_S1_MINUTES), 8 * MINUTE,
					10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_BEGINS_IN_30_SECONDS), 8 * MINUTE
					+ 30 * SECOND, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_COUNTDOWN_IN_FIVE_SECONDS), 8
					* MINUTE + 50 * SECOND, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_BEGINS_IN_S1_SECONDS), 8 * MINUTE
					+ 55 * SECOND, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_BEGINS_IN_S1_SECONDS), 8 * MINUTE
					+ 56 * SECOND, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_BEGINS_IN_S1_SECONDS), 8 * MINUTE
					+ 57 * SECOND, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_BEGINS_IN_S1_SECONDS), 8 * MINUTE
					+ 58 * SECOND, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_BEGINS_IN_S1_SECONDS), 8 * MINUTE
					+ 59 * SECOND, 10 * MINUTE);
			s.scheduleGeneralAtFixedRate(new Announcement(
					SystemMessageId.MONSRACE_RACE_START), 9 * MINUTE,
					10 * MINUTE);
			// */
		}
		_managers.add(this);
	}

	@Override
	public final RaceManagerKnownList getKnownList() {
		if (super.getKnownList() == null
				|| !(super.getKnownList() instanceof RaceManagerKnownList))
			setKnownList(new RaceManagerKnownList(this));
		return (RaceManagerKnownList) super.getKnownList();
	}

	class Announcement implements Runnable {
		private SystemMessageId _type;

		public Announcement(SystemMessageId pType) {
			_type = pType;
		}

		public void run() {
			makeAnnouncement(_type);
		}
	}

	public void makeAnnouncement(SystemMessageId type) {
		SystemMessage sm = new SystemMessage(type);
		switch (type.getId()) {
		case 816: // SystemMessageId.MONSRACE_TICKETS_AVAILABLE_FOR_S1_RACE
		case 817: // SystemMessageId.MONSRACE_TICKETS_NOW_AVAILABLE_FOR_S1_RACE
			if (_state != ACCEPTING_BETS) {// System.out.println("Race
											// Initializing");
				_state = ACCEPTING_BETS;
				startRace();
			}// else{System.out.println("Race open");}
			sm.addNumber(_raceNumber);
			break;
		case 818: // SystemMessageId.MONSRACE_TICKETS_STOP_IN_S1_MINUTES
		case 820: // SystemMessageId.MONSRACE_BEGINS_IN_S1_MINUTES
		case 823: // SystemMessageId.MONSRACE_BEGINS_IN_S1_SECONDS
			sm.addNumber(_minutes);
			sm.addNumber(_raceNumber);
			_minutes--;
			break;
		case 819: // SystemMessageId.MONSRACE_TICKET_SALES_CLOSED
			// System.out.println("Sales closed");
			sm.addNumber(_raceNumber);
			_state = WAITING;
			_minutes = 2;
			break;
		case 822: // SystemMessageId.MONSRACE_COUNTDOWN_IN_FIVE_SECONDS
		case 825: // SystemMessageId.MONSRACE_RACE_END
			sm.addNumber(_raceNumber);
			_minutes = 5;
			break;
		case 826: // SystemMessageId.MONSRACE_FIRST_PLACE_S1_SECOND_S2
			// System.out.println("Placing");
			_state = RACE_END;
			sm.addNumber(MonsterRace.getInstance().getFirstPlace());
			sm.addNumber(MonsterRace.getInstance().getSecondPlace());
			break;
		}
		// System.out.println("Counter: "+minutes);
		// System.out.println("State: "+state);
		broadcast(sm);
		// System.out.println("Player's known: "+getKnownPlayers().size());
		if (type == SystemMessageId.MONSRACE_RACE_START) {
			// System.out.println("Starting race");
			_state = STARTING_RACE;
			startRace();
			_minutes = 5;
		}
	}

	protected void broadcast(L2GameServerPacket pkt) {
		for (L2RaceManagerInstance manager : _managers)
			if (!manager.isDead())
				Broadcast.toKnownPlayers(manager, pkt);
	}

	public void sendMonsterInfo() {
		broadcast(_packet);
	}

	private void startRace() {
		MonsterRace race = MonsterRace.getInstance();
		if (_state == STARTING_RACE) {
			// state++;
			PlaySound SRace = new PlaySound(1, "S_Race", 0, 0, 0, 0, 0);
			broadcast(SRace);
			PlaySound SRace2 = new PlaySound(0, "ItemSound2.race_start", 1,
					121209259, 12125, 182487, -3559);
			broadcast(SRace2);
			_packet = new MonRaceInfo(_codes[1][0], _codes[1][1],
					race.getMonsters(), race.getSpeeds());
			sendMonsterInfo();
			ThreadPoolManager.getInstance()
					.scheduleGeneral(new RunRace(), 5000);
		} else {
			// state++;
			race.newRace();
			race.newSpeeds();
			_packet = new MonRaceInfo(_codes[0][0], _codes[0][1],
					race.getMonsters(), race.getSpeeds());
			sendMonsterInfo();
		}
	}

	@Override
	public void onBypassFeedback(L2PcInstance player, String command) {
		if (command.startsWith("BuyTicket") && _state != ACCEPTING_BETS) {
			player.sendPacket(new SystemMessage(
					SystemMessageId.MONSRACE_TICKETS_NOT_AVAILABLE));
			command = "Chat 0";
		}
		if (command.startsWith("ShowOdds") && _state == ACCEPTING_BETS) {
			player.sendPacket(new SystemMessage(
					SystemMessageId.MONSRACE_NO_PAYOUT_INFO));
			command = "Chat 0";
		}
		if (command.startsWith("BuyTicket")) {
			int val = Integer.parseInt(command.substring(10));
			if (val == 0) {
				player.setRace(0, 0);
				player.setRace(1, 0);
			}
			if (val == 10 && player.getRace(0) == 0 || val == 20
					&& player.getRace(0) == 0 && player.getRace(1) == 0)
				val = 0;
			showBuyTicket(player, val);
		} else if (command.equals("ShowOdds"))
			showOdds(player);
		else if (command.equals("ShowInfo"))
			showMonsterInfo(player);
		else if (command.equals("calculateWin")) {
			// displayCalculateWinnings(player);
		} else if (command.equals("viewHistory")) {
			// displayHistory(player);
		} else
			// getKnownList().removeKnownObject(player);
			super.onBypassFeedback(player, command);
	}

	public void showOdds(L2PcInstance player) {
		if (_state == ACCEPTING_BETS)
			return;
		int npcId = getTemplate().npcId;
		String filename, search;
		NpcHtmlMessage html = new NpcHtmlMessage(getObjectId());
		filename = getHtmlPath(npcId, 5);
		html.setFile(filename);
		for (int i = 0; i < 8; i++) {
			int n = i + 1;
			search = "Mob" + n;
			html.replace(
					search,
					MonsterRace.getInstance().getMonsters()[i].getTemplate().name);
		}
		html.replace("1race", String.valueOf(_raceNumber));
		html.replace("%objectId%", String.valueOf(getObjectId()));
		player.sendPacket(html);
		player.sendPacket(ActionFailed.STATIC_PACKET);
	}

	public void showMonsterInfo(L2PcInstance player) {
		int npcId = getTemplate().npcId;
		String filename, search;
		NpcHtmlMessage html = new NpcHtmlMessage(getObjectId());
		filename = getHtmlPath(npcId, 6);
		html.setFile(filename);
		for (int i = 0; i < 8; i++) {
			int n = i + 1;
			search = "Mob" + n;
			html.replace(
					search,
					MonsterRace.getInstance().getMonsters()[i].getTemplate().name);
		}
		html.replace("%objectId%", String.valueOf(getObjectId()));
		player.sendPacket(html);
		player.sendPacket(ActionFailed.STATIC_PACKET);
	}

	public void showBuyTicket(L2PcInstance player, int val) {
		if (_state != ACCEPTING_BETS)
			return;
		int npcId = getTemplate().npcId;
		SystemMessage sm;
		String filename, search, replace;
		NpcHtmlMessage html = new NpcHtmlMessage(getObjectId());
		if (val < 10) {
			filename = getHtmlPath(npcId, 2);
			html.setFile(filename);
			for (int i = 0; i < 8; i++) {
				int n = i + 1;
				search = "Mob" + n;
				html.replace(search, MonsterRace.getInstance().getMonsters()[i]
						.getTemplate().name);
			}
			search = "No1";
			if (val == 0)
				html.replace(search, "");
			else {
				html.replace(search, "" + val);
				player.setRace(0, val);
			}
		} else if (val < 20) {
			if (player.getRace(0) == 0)
				return;
			filename = getHtmlPath(npcId, 3);
			html.setFile(filename);
			html.replace("0place", "" + player.getRace(0));
			search = "Mob1";
			replace = MonsterRace.getInstance().getMonsters()[player.getRace(0) - 1]
					.getTemplate().name;
			html.replace(search, replace);
			search = "0adena";
			if (val == 10)
				html.replace(search, "");
			else {
				html.replace(search, "" + _cost[val - 11]);
				player.setRace(1, val - 10);
			}
		} else if (val == 20) {
			if (player.getRace(0) == 0 || player.getRace(1) == 0)
				return;
			filename = getHtmlPath(npcId, 4);
			html.setFile(filename);
			html.replace("0place", "" + player.getRace(0));
			search = "Mob1";
			replace = MonsterRace.getInstance().getMonsters()[player.getRace(0) - 1]
					.getTemplate().name;
			html.replace(search, replace);
			search = "0adena";
			int price = _cost[player.getRace(1) - 1];
			html.replace(search, "" + price);
			search = "0tax";
			int tax = 0;
			html.replace(search, "" + tax);
			search = "0total";
			int total = price + tax;
			html.replace(search, "" + total);
		} else {
			if (player.getRace(0) == 0 || player.getRace(1) == 0)
				return;
			int ticket = player.getRace(0);
			int priceId = player.getRace(1);
			if (!player.reduceAdena("Race", _cost[priceId - 1], this, true))
				return;
			player.setRace(0, 0);
			player.setRace(1, 0);
			sm = new SystemMessage(SystemMessageId.ACQUIRED);
			sm.addNumber(_raceNumber);
			sm.addItemName(4443);
			player.sendPacket(sm);
			L2ItemInstance item = new L2ItemInstance(IdFactory.getInstance()
					.getNextId(), 4443);
			item.setCount(1);
			item.setEnchantLevel(_raceNumber);
			item.setCustomType1(ticket);
			item.setCustomType2(_cost[priceId - 1] / 100);
			player.getInventory().addItem("Race", item, player, this);
			InventoryUpdate iu = new InventoryUpdate();
			iu.addItem(item);
			L2ItemInstance adenaupdate = player.getInventory().getItemByItemId(
					57);
			iu.addModifiedItem(adenaupdate);
			player.sendPacket(iu);
			return;
		}
		html.replace("1race", String.valueOf(_raceNumber));
		html.replace("%objectId%", String.valueOf(getObjectId()));
		player.sendPacket(html);
		player.sendPacket(ActionFailed.STATIC_PACKET);
	}

	public class Race {
		private Info[] _info;

		public Race(Info[] pInfo) {
			_info = pInfo;
		}

		public Info getLaneInfo(int lane) {
			return _info[lane];
		}

		public class Info {
			private int _id;
			private int _place;
			private int _odds;
			private int _payout;

			public Info(int pId, int pPlace, int pOdds, int pPayout) {
				_id = pId;
				_place = pPlace;
				_odds = pOdds;
				_payout = pPayout;
			}

			public int getId() {
				return _id;
			}

			public int getOdds() {
				return _odds;
			}

			public int getPayout() {
				return _payout;
			}

			public int getPlace() {
				return _place;
			}
		}
	}

	class RunRace implements Runnable {
		public void run() {
			_packet = new MonRaceInfo(_codes[2][0], _codes[2][1], MonsterRace
					.getInstance().getMonsters(), MonsterRace.getInstance()
					.getSpeeds());
			sendMonsterInfo();
			ThreadPoolManager.getInstance()
					.scheduleGeneral(new RunEnd(), 30000);
		}
	}

	class RunEnd implements Runnable {
		public void run() {
			makeAnnouncement(SystemMessageId.MONSRACE_FIRST_PLACE_S1_SECOND_S2);
			makeAnnouncement(SystemMessageId.MONSRACE_RACE_END);
			_raceNumber++;
			DeleteObject obj = null;
			for (int i = 0; i < 8; i++) {
				obj = new DeleteObject(
						MonsterRace.getInstance().getMonsters()[i]);
				broadcast(obj);
			}
		}
	}
}
